home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / comms_w / fibsw130.zip / EXAMPLE.SCR < prev    next >
Text File  |  1994-04-27  |  2KB  |  77 lines
  1. @echo 0 ;%%Simple example of a UNIX login script.
  2. @rem ******************************************************************
  3. @rem *** SIMPLE.SCC: A simple example of an automated login script  ***
  4. @rem ***    This script works for a UNIX dial-up host with csh      ***
  5. @rem ***    as the default shell.                                   ***
  6. @rem ******************************************************************
  7.  
  8.  
  9. @rem ** Dial the number **
  10. @echo "Dialing..\r\n"
  11. @send "%DialStringPrefix%%TelephoneNumber%\r"
  12.  
  13. @rem ** Respond to the login prompt **
  14. @if not @wait "ogin:" 50
  15. @  echo "\r\n** ERROR: login prompt not received\r\n"
  16. @  rem ** the following line terminates script execution. **
  17. <
  18. @endif
  19. @send "%HostLoginName%\r"
  20.  
  21. @rem ** Respond to the password prompt **
  22. @if %HostPassword% != ""
  23. @  if not @wait     "assword:" 10
  24. @    echo "\r\n** ERROR: Password prompt not received\r\n"
  25. <
  26. @  endif
  27. @  send "%HostPassword%\r"
  28. @  wait '%'    ; Wait indefinitely for the csh command prompt.
  29. @else 
  30. @  echo "\r\n** Script execution will resume after you type your password\r\n"
  31. @  wait "%"    ; Wait indefinitely for the csh command prompt.
  32. @endif
  33.  
  34. @rem ** Establish the telnet connection **
  35.  
  36. @send "\r"    ; Get a second csh prompt just to make sure@
  37. @if not @wait '%' 20
  38. @  echo "\r\n** ERROR: csh prompt not received\r\n"
  39. <
  40. @endif
  41.  
  42.  
  43.  
  44. @send "telnet %FibsInternetAddress% %FibsTelnetPort%\r"
  45.  
  46. @rem ** Log in to FIBS
  47. @if "%FibsLoginName%" != ""
  48. @  wait     "ogin:" 30
  49. @  send "%FibsLoginName%\r"
  50. @  wait "\n"
  51. @  if "%FibsPassword" != ""
  52. @     wait     "word:" 30
  53. @     send "%FibsPassword%\r"
  54. @     wait     "\n>" 40
  55. @  else
  56. @     "echo ** Script execution will resume after you type your password\r\n"
  57. @     wait "\n>"
  58. @  endif
  59. @else 
  60. @  wait "\n>"   ; Wait indefinitely for the FIBS prompt
  61. @endif
  62.  
  63. @rem ** Initialize FIBS
  64. @send "set boardstyle 3\r"
  65. @wait     "Value of" 40
  66. @wait "\n>"
  67. @send "toggle automove\r"
  68. @wait "**" 40
  69. @wait "\n>"
  70. @echo "\r****** CONNECTED ******\r\n>"
  71.  
  72.  
  73.  
  74.  
  75.  
  76.  
  77.